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Logical Inclusive OR 

TAPES 
ASCII Source; 090-000026 

This routine computes the logical inclusive OR of two 16-bit 
numbers . 
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1 ,1 Memory 

IK or larger memory 

NOW central processor 
•'- - 3 TT, x t ern a 1 1 ub r o u t in ._- s 

Hone 
1.4 Other 

None 
2 , OPERATING PROC^D UR^ 

2.1 Calling Sequence 

JSR .OR 

return 

2.2 Input Format 

One 16-bit quantity is passed in hC0 , the 
second in £C1 . 

2„3 Output Format 

The inclusive OR of the two quantities is 
returned in ^C0. 

2 > % ^rror Returns 

None 
2 - 5 Stat -j of thii Pc t ivj R:gi5 t?rf upon..3xit 

AC2 # J^C3 # and Carry are unchanged . hC0 , and AC1 

are destroyed . 
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2 - ^ Caution- t o u?_ -r 

None 

3- DISCUS S ION 

3 . 1 Algorithms 

With an inclusive OR, a bit of the result is 1 
if either of the corresponding bits is 1. 
Otherwise, the result bit is 0, The algorithm 
for full words is 

£ V B=AA^B + B 

Taking the arguments as single bits, if B is 1, 

A A ^ B is regardless of the state of A, and 
the expression on the left is 1 . If B is 0, 

the expression is 1 or as A is 1 or 0. In no 
case are ?, A w B and B both 1, so the full word 
addition generates no carries. 

3 . 2 Limitations and Accuracy 

The routine is exact. 

3 .3 Size and Timing 

.OR is 4 words in length. 
Execution time is 20 e J4 seconds . 

3.4 References 

Section 2.2 of "How to Use the NOVA" contains 
a further discussion of logical arithmetic. 

3.5 Flow Diagrams 
None 
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4. EXAMPLES MTD APPLICATIONS 

The ASCII source of .OR is provided with the NOVA 
software. If a user routine requires inclusive OR, 
this tape should be edited into his software. 

5. P ROGRAM LI ST ING 

A listing of ,0a follows. No origin is given in the 
source, enabling the tape to be edited anywhere within 
a user routine. 



I LOGIC;-'-- c -° 

I COMPUTES THE LOGICAL INCLUSIVE OR Of 
J TWO UNSIGNED NUMBERS 



J INPUTt 

I OUTPUT t 



A IN ACO# B IN AC! 

A «OP* B IH ACS 



I CALLING SEQUENCE! 
j JSR »0R 

I RETURN 



I DESTROYEDl 
I UNCHANGED I 

I METHOD! 



AC§# AC! 

ACS?* AC3# CARRY 

A •OK. B * •NGT*B *AWD» A ♦ B 



00008 124000 
00C5PJ1 123400 
00002 I8P000 
PJW003 001400 



ORt 



COM I » 1 
AND !#0 
ADC 1#0 

JMP if* 3 



I 


.NOT. B 




.1 


A -AND* 


•MOT. B 


1 


.NOT* B 


• AM)* A * B 


J 


RETURN 





